gusucode.com > 耐品图片管理系统 标准版A > 耐品图片管理系统 标准版A/Admin_Main.asp
<!--#include file="Admin_ChkPurview1.asp"-->
<!--#include file="Api/Api_Config.asp"-->
<%
'===============================================================
' 著作权号：中国国家版权局著作权登记号2004SR07385
' 版权所有：深圳市耐品科技开发有限公司 www.naipin.com
' 联系电话：0755-26611119 81234844 81234845
' 联系手机：13316911914
' 联系邮箱：naipin@naipin.com
'===============================================================
If Not Netout.Master Then
Response.Redirect("Admin_Images.asp")
End If
Dim Netout_Objects(7)
Netout_Objects(0) = "MSWC.AdRotator"
Netout_Objects(1) = "Scripting.FileSystemObject"
Netout_Objects(2) = "adodb.connection"
Netout_Objects(3) = "JMail.SMTPMail"
Netout_Objects(4) = "CDONTS.NewMail"
Netout_Objects(5) = "Persits.Jpeg"
%>
<html>
<head>
<title>管理员页面</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<%
Title="快速入门步骤"
Link="<a href='ReloadCache.asp'>清理缓存</a> | <a href='Admin_SiteConfig.asp' class='black'>网站配置</a>→<a href='Admin_ClassAdd.asp' class='black'>添加分类</a>→<a href='Admin_Add.asp' class='black'>添加内容</a>→其他操作"
Behind.WriteHtmlHead
Behind.WriteHtmlTop Title,Link
%>
<script language="javascript" src="Inc/Pop.js"></script>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
<tr>
<td align="center" class="tdbg1"><b> 官 方 信 息 栏</b></td>
</tr>
<tr>
<td class="tdbg">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td>
<iframe name="newinfo" width="100%" height="168" frameborder="0" scrolling="no" src="http://www.naipin.com/home/ads/naipin_v1_0.htm"></iframe>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<div id="sidivlayer" name="sidivlayer" style="display: none;"><%=(Round(Netout.GetFolderSize(".")/1024/1024,2))&","&Config.Settings(26)&","&Api_SysKey&","&Config.Settings(0)&","&Config.SoftInfo(1)&","&Config.SoftInfo(7)%></div>
<table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="border">
<tr>
<td align="center" colspan="2" class="tdbg1"><b>服 务 器 信 息</b></td>
</tr>
<tr>
<td width="50%" class="tdbg">FSO文本读写：
<%If Not Netout.ObjectInstalled(Netout_Objects(1)) Then%>
<font color="red"><b>×</b></font>
<%else%>
<b>√</b>
<%end if%>
</td>
<td width="50%" class="tdbg">数据库使用：
<%If Not Netout.ObjectInstalled(Netout_Objects(2)) Then%>
<font color="red"><b>×</b></font>
<%else%>
<b>√</b>
<%end if%>
</td>
</tr>
<tr>
<td class="tdbg">Jmail 组件支持：
<%If Not Netout.ObjectInstalled(Netout_Objects(3)) Then%>
<font color="red"><b>×</b></font>
<%else%>
<b>√</b>
<%end if%>
</td>
<td class="tdbg">CDONTS 组件支持：
<%If Not Netout.ObjectInstalled(Netout_Objects(4)) Then%>
<font color="red"><b>×</b></font>
<%else%>
<b>√</b>
<%end if%>
</td>
</tr>
<tr>
<td class="tdbg">AspJpeg 组件支持：
<%If Not Netout.ObjectInstalled(Netout_Objects(5)) Then%>
<font color="red"><b>×</b></font>
<%else%>
<b>√</b>
<%end if%>
</td>
<td class="tdbg">脚本超时时间：<%=Server.ScriptTimeout%> 秒 </td>
</tr>
</table>
<br>
<table width="100%" border="0" cellspacing="1" cellpadding="2" class="border">
<tr>
<td colspan="2" class="tdbg1" align="center"><b>产 品 开 发 信 息</b></td>
</tr>
<tr>
<td width="50%" class="tdbg">产品开发：<%=Config.SoftInfo(4)%></td><td class="tdbg">中国国家版权局著作权登记号2004SR07385</td>
</tr>
<tr>
<td class="tdbg">联系电话：<%=Config.SoftInfo(5)%> </td><td class="tdbg">Email：<a href="mailto:<%=Config.SoftInfo(6)%>" class="black"><%=Config.SoftInfo(6)%></a></td>
</tr>
<tr>
<td colspan="2" class="tdbg"> </td>
</tr>
<tr>
<td colspan="2" class="tdbg"><div align="center">Copyright© 2003-2008
<a class="black" href="<%=Config.SoftInfo(2)%>" target="_blank"><%=Config.SoftInfo(3)%></a>.All Rights Reserved.</div></td>
</tr>
</table>
<%Behind.WriteHtmlEnd%>
<%set Netout=nothing%>
<script language="javascript" src="http://dlt.zoosnet.net/JS/LsJS.aspx?siteid=DLT41035769"></script>